home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / BZIP2 / 980316 / bzip / Patch < prev    next >
Text File  |  1998-03-16  |  24KB  |  757 lines
  1. --- bzip2.c    Fri Aug 29 23:32:15 1997
  2. +++ bzip2.acorn    Fri Mar 13 15:25:45 1998
  3. @@ -1,4 +1,3 @@
  4. -
  5.  /*-----------------------------------------------------------*/
  6.  /*--- A block-sorting, lossless compressor        bzip2.c ---*/
  7.  /*-----------------------------------------------------------*/
  8. @@ -94,16 +93,20 @@
  9.    Generic 32-bit Unix.
  10.    Also works on 64-bit Unix boxes.
  11.  --*/
  12. -#define BZ_UNIX      1
  13. +#define BZ_UNIX        0
  14.  
  15.  /*--
  16.    Win32, as seen by Jacob Navia's excellent
  17.    port of (Chris Fraser & David Hanson)'s excellent
  18.    lcc compiler.
  19.  --*/
  20. -#define BZ_LCCWIN32  0
  21. +#define BZ_LCCWIN32    0
  22.  
  23. +/*--
  24. +  Acorn's RISC OS (currently requires unixlib & gcc)
  25. +--*/
  26.  
  27. +#define BZ_RISCOS    1
  28.  
  29.  /*---------------------------------------------*/
  30.  /*--
  31. @@ -225,6 +228,44 @@
  32.  
  33.  #endif
  34.  
  35. +#if BZ_RISCOS
  36. +   #define BZ_FILETYPE 0x16E
  37. +
  38. +   #include <sys/types.h>
  39. +   #include <stdio.h>        /* required by tmpnam() */
  40. +   #include <sys/os.h>        /* required by os_file() */
  41. +   #include <utime.h>
  42. +   #include <unistd.h>        /* can i narrow this down & remove it? */
  43. +   #include <malloc.h>
  44. +   #include <sys/stat.h>
  45. +   #include <sys/times.h>
  46. +
  47. +
  48. +   #define Int32   int
  49. +   #define UInt32  unsigned int
  50. +   #define Char    char
  51. +   #define UChar   unsigned char
  52. +   #define Int16   short
  53. +   #define UInt16  unsigned short
  54. +
  55. +   #define PATH_SEP    '.'
  56. +   #define MY_LSTAT    lstat
  57. +   #define MY_S_IFREG  S_ISREG
  58. +   #define MY_STAT     stat
  59. +
  60. +   #define APPEND_FILESPEC(root, name) \
  61. +      root=snocString((root), (name))
  62. +
  63. +   #define SET_BINARY_MODE(fd) /**/
  64. +
  65. +   /*--
  66. +      You should try very hard to persuade your C compiler
  67. +      to inline the bits marked INLINE.  Otherwise bzip2 will
  68. +      run rather slowly.  gcc version 2.x is recommended.
  69. +   --*/
  70. +   #define INLINE   inline
  71. +   #define NORETURN __attribute__ ((noreturn))
  72. +#endif
  73.  
  74.  /*---------------------------------------------*/
  75.  /*--
  76. @@ -408,7 +449,7 @@
  77.  --*/
  78.  UChar    *block;    /*-- compress   --*/
  79.  UInt16   *quadrant; /*-- compress   --*/
  80. -Int32    *zptr;     /*-- compress   --*/ 
  81. +Int32    *zptr;     /*-- compress   --*/
  82.  UInt16   *szptr;    /*-- overlays zptr ---*/
  83.  Int32    *ftab;     /*-- compress   --*/
  84.  
  85. @@ -448,7 +489,7 @@
  86.  
  87.  /*--
  88.    Used when sorting.  If too many long comparisons
  89. -  happen, we stop sorting, randomise the block 
  90. +  happen, we stop sorting, randomise the block
  91.    slightly, and try again.
  92.  --*/
  93.  
  94. @@ -821,7 +862,7 @@
  95.  
  96.  
  97.  /*---------------------------------------------*/
  98. -void hbMakeCodeLengths ( UChar *len, 
  99. +void hbMakeCodeLengths ( UChar *len,
  100.                           Int32 *freq,
  101.                           Int32 alphaSize,
  102.                           Int32 maxLen )
  103. @@ -835,7 +876,7 @@
  104.  
  105.     Int32 heap   [ MAX_ALPHA_SIZE + 2 ];
  106.     Int32 weight [ MAX_ALPHA_SIZE * 2 ];
  107. -   Int32 parent [ MAX_ALPHA_SIZE * 2 ]; 
  108. +   Int32 parent [ MAX_ALPHA_SIZE * 2 ];
  109.  
  110.     for (i = 0; i < alphaSize; i++)
  111.        weight[i+1] = (freq[i] == 0 ? 1 : freq[i]) << 8;
  112. @@ -855,9 +896,9 @@
  113.           heap[nHeap] = i;
  114.           UPHEAP(nHeap);
  115.        }
  116. -      if (!(nHeap < (MAX_ALPHA_SIZE+2))) 
  117. +      if (!(nHeap < (MAX_ALPHA_SIZE+2)))
  118.           panic ( "hbMakeCodeLengths(1)" );
  119. -   
  120. +
  121.        while (nHeap > 1) {
  122.           n1 = heap[1]; heap[1] = heap[nHeap]; nHeap--; DOWNHEAP(1);
  123.           n2 = heap[1]; heap[1] = heap[nHeap]; nHeap--; DOWNHEAP(1);
  124. @@ -880,7 +921,7 @@
  125.           len[i-1] = j;
  126.           if (j > maxLen) tooLong = True;
  127.        }
  128. -      
  129. +
  130.        if (! tooLong) break;
  131.  
  132.        for (i = 1; i < alphaSize; i++) {
  133. @@ -1015,7 +1056,7 @@
  134.        The back end needs a place to store the MTF values
  135.        whilst it calculates the coding tables.  We could
  136.        put them in the zptr array.  However, these values
  137. -      will fit in a short, so we overlay szptr at the 
  138. +      will fit in a short, so we overlay szptr at the
  139.        start of zptr, in the hope of reducing the number
  140.        of cache misses induced by the multiple traversals
  141.        of the MTF values when calculating coding tables.
  142. @@ -1109,7 +1150,7 @@
  143.     wr = 0;
  144.     zPend = 0;
  145.     for (i = 0; i < nInUse; i++) yy[i] = (UChar) i;
  146. -   
  147. +
  148.  
  149.     for (i = 0; i <= last; i++) {
  150.        UChar ll_i;
  151. @@ -1195,8 +1236,8 @@
  152.     Int32  fave[N_GROUPS];
  153.  
  154.     if (verbosity >= 3)
  155. -      fprintf ( stderr, 
  156. -                "      %d in block, %d after MTF & 1-2 coding, %d+2 syms in use\n", 
  157. +      fprintf ( stderr,
  158. +                "      %d in block, %d after MTF & 1-2 coding, %d+2 syms in use\n",
  159.                  last+1, nMTF, nInUse );
  160.  
  161.     alphaSize = nInUse+2;
  162. @@ -1211,7 +1252,7 @@
  163.                     nGroups = 6;
  164.  
  165.     /*--- Generate an initial set of coding tables ---*/
  166. -   { 
  167. +   {
  168.        Int32 nPart, remF, tFreq, aFreq;
  169.  
  170.        nPart = nGroups;
  171. @@ -1226,31 +1267,31 @@
  172.              aFreq += mtfFreq[ge];
  173.           }
  174.  
  175. -         if (ge > gs 
  176. -             && nPart != nGroups && nPart != 1 
  177. +         if (ge > gs
  178. +             && nPart != nGroups && nPart != 1
  179.               && ((nGroups-nPart) % 2 == 1)) {
  180.              aFreq -= mtfFreq[ge];
  181.              ge--;
  182.           }
  183.  
  184.           if (verbosity >= 3)
  185. -            fprintf ( stderr, 
  186. +            fprintf ( stderr,
  187.                        "      initial group %d, [%d .. %d], has %d syms (%4.1f%%)\n",
  188. -                              nPart, gs, ge, aFreq, 
  189. +                              nPart, gs, ge, aFreq,
  190.                                (100.0 * (float)aFreq) / (float)nMTF );
  191. - 
  192. +
  193.           for (v = 0; v < alphaSize; v++)
  194. -            if (v >= gs && v <= ge) 
  195. +            if (v >= gs && v <= ge)
  196.                 len[nPart-1][v] = LESSER_ICOST; else
  197.                 len[nPart-1][v] = GREATER_ICOST;
  198. - 
  199. +
  200.           nPart--;
  201.           gs = ge+1;
  202.           remF -= aFreq;
  203.        }
  204.     }
  205.  
  206. -   /*--- 
  207. +   /*---
  208.        Iterate up to N_ITERS times to improve the tables.
  209.     ---*/
  210.     for (iter = 0; iter < N_ITERS; iter++) {
  211. @@ -1268,10 +1309,10 @@
  212.  
  213.           /*--- Set group start & end marks. --*/
  214.           if (gs >= nMTF) break;
  215. -         ge = gs + G_SIZE - 1; 
  216. +         ge = gs + G_SIZE - 1;
  217.           if (ge >= nMTF) ge = nMTF-1;
  218.  
  219. -         /*-- 
  220. +         /*--
  221.              Calculate the cost of this group as coded
  222.              by each of the coding tables.
  223.           --*/
  224. @@ -1280,7 +1321,7 @@
  225.           if (nGroups == 6) {
  226.              register UInt16 cost0, cost1, cost2, cost3, cost4, cost5;
  227.              cost0 = cost1 = cost2 = cost3 = cost4 = cost5 = 0;
  228. -            for (i = gs; i <= ge; i++) { 
  229. +            for (i = gs; i <= ge; i++) {
  230.                 UInt16 icv = szptr[i];
  231.                 cost0 += len[0][icv];
  232.                 cost1 += len[1][icv];
  233. @@ -1292,13 +1333,13 @@
  234.              cost[0] = cost0; cost[1] = cost1; cost[2] = cost2;
  235.              cost[3] = cost3; cost[4] = cost4; cost[5] = cost5;
  236.           } else {
  237. -            for (i = gs; i <= ge; i++) { 
  238. +            for (i = gs; i <= ge; i++) {
  239.                 UInt16 icv = szptr[i];
  240.                 for (t = 0; t < nGroups; t++) cost[t] += len[t][icv];
  241.              }
  242.           }
  243. - 
  244. -         /*-- 
  245. +
  246. +         /*--
  247.              Find the coding table which is best for this group,
  248.              and record its identity in the selector table.
  249.           --*/
  250. @@ -1310,7 +1351,7 @@
  251.           selector[nSelectors] = bt;
  252.           nSelectors++;
  253.  
  254. -         /*-- 
  255. +         /*--
  256.              Increment the symbol frequencies for the selected table.
  257.            --*/
  258.           for (i = gs; i <= ge; i++)
  259. @@ -1319,8 +1360,8 @@
  260.           gs = ge+1;
  261.        }
  262.        if (verbosity >= 3) {
  263. -         fprintf ( stderr, 
  264. -                   "      pass %d: size is %d, grp uses are ", 
  265. +         fprintf ( stderr,
  266. +                   "      pass %d: size is %d, grp uses are ",
  267.                     iter+1, totc/8 );
  268.           for (t = 0; t < nGroups; t++)
  269.              fprintf ( stderr, "%d ", fave[t] );
  270. @@ -1370,19 +1411,19 @@
  271.        }
  272.        if (maxLen > 20) panic ( "sendMTFValues(3)" );
  273.        if (minLen < 1)  panic ( "sendMTFValues(4)" );
  274. -      hbAssignCodes ( &code[t][0], &len[t][0], 
  275. +      hbAssignCodes ( &code[t][0], &len[t][0],
  276.                        minLen, maxLen, alphaSize );
  277.     }
  278.  
  279.     /*--- Transmit the mapping table. ---*/
  280. -   { 
  281. +   {
  282.        Bool inUse16[16];
  283.        for (i = 0; i < 16; i++) {
  284.            inUse16[i] = False;
  285.            for (j = 0; j < 16; j++)
  286.               if (inUse[i * 16 + j]) inUse16[i] = True;
  287.        }
  288. -     
  289. +
  290.        nBytes = bytesOut;
  291.        for (i = 0; i < 16; i++)
  292.           if (inUse16[i]) bsW(1,1); else bsW(1,0);
  293. @@ -1392,7 +1433,7 @@
  294.              for (j = 0; j < 16; j++)
  295.                 if (inUse[i * 16 + j]) bsW(1,1); else bsW(1,0);
  296.  
  297. -      if (verbosity >= 3) 
  298. +      if (verbosity >= 3)
  299.           fprintf ( stderr, "      bytes: mapping %d, ", bytesOut-nBytes );
  300.     }
  301.  
  302. @@ -1400,7 +1441,7 @@
  303.     nBytes = bytesOut;
  304.     bsW ( 3, nGroups );
  305.     bsW ( 15, nSelectors );
  306. -   for (i = 0; i < nSelectors; i++) { 
  307. +   for (i = 0; i < nSelectors; i++) {
  308.        for (j = 0; j < selectorMtf[i]; j++) bsW(1,1);
  309.        bsW(1,0);
  310.     }
  311. @@ -1429,9 +1470,9 @@
  312.     gs = 0;
  313.     while (True) {
  314.        if (gs >= nMTF) break;
  315. -      ge = gs + G_SIZE - 1; 
  316. +      ge = gs + G_SIZE - 1;
  317.        if (ge >= nMTF) ge = nMTF-1;
  318. -      for (i = gs; i <= ge; i++) { 
  319. +      for (i = gs; i <= ge; i++) {
  320.           #if DEBUG
  321.              assert (selector[selCtr] < nGroups);
  322.           #endif
  323. @@ -1467,8 +1508,8 @@
  324.  
  325.     /*--- Receive the mapping table ---*/
  326.     for (i = 0; i < 16; i++)
  327. -      if (bsR(1) == 1) 
  328. -         inUse16[i] = True; else 
  329. +      if (bsR(1) == 1)
  330. +         inUse16[i] = True; else
  331.           inUse16[i] = False;
  332.  
  333.     for (i = 0; i < 256; i++) inUse[i] = False;
  334. @@ -1494,7 +1535,7 @@
  335.     {
  336.        UChar pos[N_GROUPS], tmp, v;
  337.        for (v = 0; v < nGroups; v++) pos[v] = v;
  338. -   
  339. +
  340.        for (i = 0; i < nSelectors; i++) {
  341.           v = selectorMtf[i];
  342.           tmp = pos[v];
  343. @@ -1523,7 +1564,7 @@
  344.           if (len[t][i] > maxLen) maxLen = len[t][i];
  345.           if (len[t][i] < minLen) minLen = len[t][i];
  346.        }
  347. -      hbCreateDecodeTables ( 
  348. +      hbCreateDecodeTables (
  349.           &limit[t][0], &base[t][0], &perm[t][0], &len[t][0],
  350.           minLen, maxLen, alphaSize
  351.        );
  352. @@ -1603,7 +1644,7 @@
  353.  
  354.           if (smallMode)
  355.              while (s > 0) {
  356. -               last++; 
  357. +               last++;
  358.                 ll16[last] = ch;
  359.                 s--;
  360.              }
  361. @@ -1782,7 +1823,7 @@
  362.  
  363.     for (; hp >= 0; hp--) {
  364.        h = incs[hp];
  365. -      if (verbosity >= 5) 
  366. +      if (verbosity >= 5)
  367.           fprintf ( stderr, "          shell increment %d\n", h );
  368.  
  369.        i = lo + h;
  370. @@ -2154,58 +2195,58 @@
  371.  /*---------------------------------------------------*/
  372.  
  373.  /*---------------------------------------------*/
  374. -Int32 rNums[512] = { 
  375. -   619, 720, 127, 481, 931, 816, 813, 233, 566, 247, 
  376. -   985, 724, 205, 454, 863, 491, 741, 242, 949, 214, 
  377. -   733, 859, 335, 708, 621, 574, 73, 654, 730, 472, 
  378. -   419, 436, 278, 496, 867, 210, 399, 680, 480, 51, 
  379. -   878, 465, 811, 169, 869, 675, 611, 697, 867, 561, 
  380. -   862, 687, 507, 283, 482, 129, 807, 591, 733, 623, 
  381. -   150, 238, 59, 379, 684, 877, 625, 169, 643, 105, 
  382. -   170, 607, 520, 932, 727, 476, 693, 425, 174, 647, 
  383. -   73, 122, 335, 530, 442, 853, 695, 249, 445, 515, 
  384. -   909, 545, 703, 919, 874, 474, 882, 500, 594, 612, 
  385. -   641, 801, 220, 162, 819, 984, 589, 513, 495, 799, 
  386. -   161, 604, 958, 533, 221, 400, 386, 867, 600, 782, 
  387. -   382, 596, 414, 171, 516, 375, 682, 485, 911, 276, 
  388. -   98, 553, 163, 354, 666, 933, 424, 341, 533, 870, 
  389. -   227, 730, 475, 186, 263, 647, 537, 686, 600, 224, 
  390. -   469, 68, 770, 919, 190, 373, 294, 822, 808, 206, 
  391. -   184, 943, 795, 384, 383, 461, 404, 758, 839, 887, 
  392. -   715, 67, 618, 276, 204, 918, 873, 777, 604, 560, 
  393. -   951, 160, 578, 722, 79, 804, 96, 409, 713, 940, 
  394. -   652, 934, 970, 447, 318, 353, 859, 672, 112, 785, 
  395. -   645, 863, 803, 350, 139, 93, 354, 99, 820, 908, 
  396. -   609, 772, 154, 274, 580, 184, 79, 626, 630, 742, 
  397. -   653, 282, 762, 623, 680, 81, 927, 626, 789, 125, 
  398. -   411, 521, 938, 300, 821, 78, 343, 175, 128, 250, 
  399. -   170, 774, 972, 275, 999, 639, 495, 78, 352, 126, 
  400. -   857, 956, 358, 619, 580, 124, 737, 594, 701, 612, 
  401. -   669, 112, 134, 694, 363, 992, 809, 743, 168, 974, 
  402. -   944, 375, 748, 52, 600, 747, 642, 182, 862, 81, 
  403. -   344, 805, 988, 739, 511, 655, 814, 334, 249, 515, 
  404. -   897, 955, 664, 981, 649, 113, 974, 459, 893, 228, 
  405. -   433, 837, 553, 268, 926, 240, 102, 654, 459, 51, 
  406. -   686, 754, 806, 760, 493, 403, 415, 394, 687, 700, 
  407. -   946, 670, 656, 610, 738, 392, 760, 799, 887, 653, 
  408. -   978, 321, 576, 617, 626, 502, 894, 679, 243, 440, 
  409. -   680, 879, 194, 572, 640, 724, 926, 56, 204, 700, 
  410. -   707, 151, 457, 449, 797, 195, 791, 558, 945, 679, 
  411. -   297, 59, 87, 824, 713, 663, 412, 693, 342, 606, 
  412. -   134, 108, 571, 364, 631, 212, 174, 643, 304, 329, 
  413. -   343, 97, 430, 751, 497, 314, 983, 374, 822, 928, 
  414. -   140, 206, 73, 263, 980, 736, 876, 478, 430, 305, 
  415. -   170, 514, 364, 692, 829, 82, 855, 953, 676, 246, 
  416. -   369, 970, 294, 750, 807, 827, 150, 790, 288, 923, 
  417. -   804, 378, 215, 828, 592, 281, 565, 555, 710, 82, 
  418. -   896, 831, 547, 261, 524, 462, 293, 465, 502, 56, 
  419. -   661, 821, 976, 991, 658, 869, 905, 758, 745, 193, 
  420. -   768, 550, 608, 933, 378, 286, 215, 979, 792, 961, 
  421. -   61, 688, 793, 644, 986, 403, 106, 366, 905, 644, 
  422. -   372, 567, 466, 434, 645, 210, 389, 550, 919, 135, 
  423. -   780, 773, 635, 389, 707, 100, 626, 958, 165, 504, 
  424. -   920, 176, 193, 713, 857, 265, 203, 50, 668, 108, 
  425. -   645, 990, 626, 197, 510, 357, 358, 850, 858, 364, 
  426. +Int32 rNums[512] = {
  427. +   619, 720, 127, 481, 931, 816, 813, 233, 566, 247,
  428. +   985, 724, 205, 454, 863, 491, 741, 242, 949, 214,
  429. +   733, 859, 335, 708, 621, 574, 73, 654, 730, 472,
  430. +   419, 436, 278, 496, 867, 210, 399, 680, 480, 51,
  431. +   878, 465, 811, 169, 869, 675, 611, 697, 867, 561,
  432. +   862, 687, 507, 283, 482, 129, 807, 591, 733, 623,
  433. +   150, 238, 59, 379, 684, 877, 625, 169, 643, 105,
  434. +   170, 607, 520, 932, 727, 476, 693, 425, 174, 647,
  435. +   73, 122, 335, 530, 442, 853, 695, 249, 445, 515,
  436. +   909, 545, 703, 919, 874, 474, 882, 500, 594, 612,
  437. +   641, 801, 220, 162, 819, 984, 589, 513, 495, 799,
  438. +   161, 604, 958, 533, 221, 400, 386, 867, 600, 782,
  439. +   382, 596, 414, 171, 516, 375, 682, 485, 911, 276,
  440. +   98, 553, 163, 354, 666, 933, 424, 341, 533, 870,
  441. +   227, 730, 475, 186, 263, 647, 537, 686, 600, 224,
  442. +   469, 68, 770, 919, 190, 373, 294, 822, 808, 206,
  443. +   184, 943, 795, 384, 383, 461, 404, 758, 839, 887,
  444. +   715, 67, 618, 276, 204, 918, 873, 777, 604, 560,
  445. +   951, 160, 578, 722, 79, 804, 96, 409, 713, 940,
  446. +   652, 934, 970, 447, 318, 353, 859, 672, 112, 785,
  447. +   645, 863, 803, 350, 139, 93, 354, 99, 820, 908,
  448. +   609, 772, 154, 274, 580, 184, 79, 626, 630, 742,
  449. +   653, 282, 762, 623, 680, 81, 927, 626, 789, 125,
  450. +   411, 521, 938, 300, 821, 78, 343, 175, 128, 250,
  451. +   170, 774, 972, 275, 999, 639, 495, 78, 352, 126,
  452. +   857, 956, 358, 619, 580, 124, 737, 594, 701, 612,
  453. +   669, 112, 134, 694, 363, 992, 809, 743, 168, 974,
  454. +   944, 375, 748, 52, 600, 747, 642, 182, 862, 81,
  455. +   344, 805, 988, 739, 511, 655, 814, 334, 249, 515,
  456. +   897, 955, 664, 981, 649, 113, 974, 459, 893, 228,
  457. +   433, 837, 553, 268, 926, 240, 102, 654, 459, 51,
  458. +   686, 754, 806, 760, 493, 403, 415, 394, 687, 700,
  459. +   946, 670, 656, 610, 738, 392, 760, 799, 887, 653,
  460. +   978, 321, 576, 617, 626, 502, 894, 679, 243, 440,
  461. +   680, 879, 194, 572, 640, 724, 926, 56, 204, 700,
  462. +   707, 151, 457, 449, 797, 195, 791, 558, 945, 679,
  463. +   297, 59, 87, 824, 713, 663, 412, 693, 342, 606,
  464. +   134, 108, 571, 364, 631, 212, 174, 643, 304, 329,
  465. +   343, 97, 430, 751, 497, 314, 983, 374, 822, 928,
  466. +   140, 206, 73, 263, 980, 736, 876, 478, 430, 305,
  467. +   170, 514, 364, 692, 829, 82, 855, 953, 676, 246,
  468. +   369, 970, 294, 750, 807, 827, 150, 790, 288, 923,
  469. +   804, 378, 215, 828, 592, 281, 565, 555, 710, 82,
  470. +   896, 831, 547, 261, 524, 462, 293, 465, 502, 56,
  471. +   661, 821, 976, 991, 658, 869, 905, 758, 745, 193,
  472. +   768, 550, 608, 933, 378, 286, 215, 979, 792, 961,
  473. +   61, 688, 793, 644, 986, 403, 106, 366, 905, 644,
  474. +   372, 567, 466, 434, 645, 210, 389, 550, 919, 135,
  475. +   780, 773, 635, 389, 707, 100, 626, 958, 165, 504,
  476. +   920, 176, 193, 713, 857, 265, 203, 50, 668, 108,
  477. +   645, 990, 626, 197, 510, 357, 358, 850, 858, 364,
  478.     936, 638
  479.  };
  480.  
  481. @@ -2401,12 +2442,12 @@
  482.                 ch2 ^= (UInt32)RAND_MASK;
  483.              }
  484.              i2++;
  485. -   
  486. +
  487.              if (dst)
  488.                 retVal = putc ( ch2, dst );
  489. -   
  490. +
  491.              UPDATE_CRC ( localCrc, (UChar)ch2 );
  492. -   
  493. +
  494.              if (ch2 != chPrev) {
  495.                 count = 1;
  496.              } else {
  497. @@ -2504,10 +2545,10 @@
  498.              RAND_UPD_MASK;
  499.              ch2 ^= (UInt32)RAND_MASK;
  500.              i2++;
  501. -   
  502. +
  503.              retVal = putc ( ch2, dst );
  504.              UPDATE_CRC ( localCrc, (UChar)ch2 );
  505. -   
  506. +
  507.              if (ch2 != chPrev) {
  508.                 count = 1;
  509.              } else {
  510. @@ -2534,10 +2575,10 @@
  511.              chPrev = ch2;
  512.              GET_FAST(ch2);
  513.              i2++;
  514. -   
  515. +
  516.              retVal = putc ( ch2, dst );
  517.              UPDATE_CRC ( localCrc, (UChar)ch2 );
  518. -   
  519. +
  520.              if (ch2 != chPrev) {
  521.                 count = 1;
  522.              } else {
  523. @@ -2754,7 +2795,7 @@
  524.     }
  525.  
  526.     if (verbosity >= 2 && nBlocksRandomised > 0)
  527. -      fprintf ( stderr, "    %d block%s needed randomisation\n", 
  528. +      fprintf ( stderr, "    %d block%s needed randomisation\n",
  529.                          nBlocksRandomised,
  530.                          nBlocksRandomised == 1 ? "" : "s" );
  531.  
  532. @@ -3083,10 +3124,10 @@
  533.                     progName );
  534.     }
  535.     if (numFileNames > 0 && numFilesProcessed < numFileNames) {
  536. -      fprintf ( stderr, 
  537. +      fprintf ( stderr,
  538.                  "%s: WARNING: some files have not been processed:\n"
  539.                  "\t%d specified on command line, %d not processed yet.\n\n",
  540. -                progName, numFileNames, 
  541. +                progName, numFileNames,
  542.                            numFileNames - numFilesProcessed );
  543.     }
  544.     exit ( ec );
  545. @@ -3276,10 +3317,16 @@
  546.  /*---------------------------------------------*/
  547.  Bool fileExists ( Char* name )
  548.  {
  549. +#ifdef BZ_RISCOS
  550. +   int regs[6];
  551. +   os_file( 17, name, regs );
  552. +   return regs[0] & 1;
  553. +#else
  554.     FILE *tmp   = fopen ( name, "rb" );
  555.     Bool exists = (tmp != NULL);
  556.     if (tmp != NULL) fclose ( tmp );
  557.     return exists;
  558. +#endif
  559.  }
  560.  
  561.  
  562. @@ -3302,7 +3349,7 @@
  563.  /*---------------------------------------------*/
  564.  void copyDateAndPermissions ( Char *srcName, Char *dstName )
  565.  {
  566. -   #if BZ_UNIX
  567. +#if BZ_UNIX
  568.     IntNative      retVal;
  569.     struct MY_STAT statBuf;
  570.     struct utimbuf uTimBuf;
  571. @@ -3316,13 +3363,22 @@
  572.     ERROR_IF_NOT_ZERO ( retVal );
  573.     retVal = utime ( dstName, &uTimBuf );
  574.     ERROR_IF_NOT_ZERO ( retVal );
  575. -   #endif
  576. +#elif BZ_RISCOS
  577. +   int regs [6];
  578. +   os_file(17, srcName, regs);
  579. +   os_file(1, dstName, regs);
  580. +#endif
  581.  }
  582.  
  583.  
  584.  /*---------------------------------------------*/
  585.  Bool endsInBz2 ( Char* name )
  586.  {
  587. +#ifdef BZ_RISCOS
  588. +   int regs[6];
  589. +   os_file(17, name, regs);
  590. +   return (((regs[2] & 0x000fff00) >> 8) == BZ_FILETYPE);
  591. +#else
  592.     Int32 n = strlen ( name );
  593.     if (n <= 4) return False;
  594.     return
  595. @@ -3330,6 +3386,7 @@
  596.         name[n-3] == 'b' &&
  597.         name[n-2] == 'z' &&
  598.         name[n-1] == '2');
  599. +#endif
  600.  }
  601.  
  602.  
  603. @@ -3348,18 +3405,29 @@
  604.  {
  605.     FILE *inStr;
  606.     FILE *outStr;
  607. +   char *off;
  608.  
  609.     if (name == NULL && srcMode != SM_I2O)
  610.        panic ( "compress: bad modes\n" );
  611.  
  612.     switch (srcMode) {
  613.        case SM_I2O: strcpy ( inName, "(stdin)" );
  614. -                   strcpy ( outName, "(stdout)" ); break;
  615. +                   strcpy ( outName, "(stdout)" );
  616. +                   break;
  617.        case SM_F2F: strcpy ( inName, name );
  618.                     strcpy ( outName, name );
  619. -                   strcat ( outName, ".bz2" ); break;
  620. +#ifdef BZ_RISCOS
  621. +           off = strrchr ( outName, '.' );
  622. +           if (off == NULL) off = outName-1;
  623. +           memcpy ( off+1, "bzXXXXXX", 9);
  624. +           mktemp ( outName );
  625. +#else
  626. +                   strcat ( outName, ".bz2" );
  627. +#endif
  628. +           break;
  629.        case SM_F2O: strcpy ( inName, name );
  630. -                   strcpy ( outName, "(stdout)" ); break;
  631. +                   strcpy ( outName, "(stdout)" );
  632. +                   break;
  633.     }
  634.  
  635.     if ( srcMode != SM_I2O && containsDubiousChars ( inName ) ) {
  636. @@ -3377,11 +3445,13 @@
  637.                  progName, inName );
  638.        return;
  639.     }
  640. +#ifndef BZ_RISCOS
  641.     if ( srcMode != SM_I2O && notABogStandardFile ( inName )) {
  642.        fprintf ( stderr, "%s: Input file %s is not a normal file, skipping.\n",
  643.                  progName, inName );
  644.        return;
  645.     }
  646. +#endif
  647.     if ( srcMode == SM_F2F && fileExists ( outName ) ) {
  648.        fprintf ( stderr, "%s: Output file %s already exists, skipping.\n",
  649.                  progName, outName );
  650. @@ -3455,9 +3525,19 @@
  651.     /*--- If there was an I/O error, we won't get here. ---*/
  652.     if ( srcMode == SM_F2F ) {
  653.        copyDateAndPermissions ( inName, outName );
  654. +#ifdef BZ_RISCOS
  655. +      {
  656. +         int regs[3];
  657. +         regs[2] = BZ_FILETYPE;
  658. +         os_file( 18, outName, regs);
  659. +      }
  660. +#endif
  661.        if ( !keepInputFiles ) {
  662.           IntNative retVal = remove ( inName );
  663.           ERROR_IF_NOT_ZERO ( retVal );
  664. +#ifdef BZ_RISCOS
  665. +     rename( outName, inName );
  666. +#endif
  667.        }
  668.     }
  669.  }
  670. @@ -3469,20 +3549,30 @@
  671.     FILE *inStr;
  672.     FILE *outStr;
  673.     Bool magicNumberOK;
  674. +   char *off;
  675.  
  676.     if (name == NULL && srcMode != SM_I2O)
  677.        panic ( "uncompress: bad modes\n" );
  678.  
  679.     switch (srcMode) {
  680.        case SM_I2O: strcpy ( inName, "(stdin)" );
  681. -                   strcpy ( outName, "(stdout)" ); break;
  682. +                   strcpy ( outName, "(stdout)" );
  683. +                   break;
  684.        case SM_F2F: strcpy ( inName, name );
  685.                     strcpy ( outName, name );
  686. +#ifdef BZ_RISCOS
  687. +           off = strrchr ( outName, '.' );
  688. +           if (off == NULL) off = outName-1;
  689. +           memcpy ( off+1, "bzXXXXXX", 9);
  690. +           mktemp ( outName );
  691. +#else
  692.                     if (endsInBz2 ( outName ))
  693.                        outName [ strlen ( outName ) - 4 ] = '\0';
  694. +#endif
  695.                     break;
  696.        case SM_F2O: strcpy ( inName, name );
  697. -                   strcpy ( outName, "(stdout)" ); break;
  698. +                   strcpy ( outName, "(stdout)" );
  699. +                   break;
  700.     }
  701.  
  702.     if ( srcMode != SM_I2O && containsDubiousChars ( inName ) ) {
  703. @@ -3501,11 +3591,13 @@
  704.                  progName, inName );
  705.        return;
  706.     }
  707. +#ifndef BZ_RISCOS
  708.     if ( srcMode != SM_I2O && notABogStandardFile ( inName )) {
  709.        fprintf ( stderr, "%s: Input file %s is not a normal file, skipping.\n",
  710.                  progName, inName );
  711.        return;
  712.     }
  713. +#endif
  714.     if ( srcMode == SM_F2F && fileExists ( outName ) ) {
  715.        fprintf ( stderr, "%s: Output file %s already exists, skipping.\n",
  716.                  progName, outName );
  717. @@ -3576,6 +3668,14 @@
  718.              IntNative retVal = remove ( inName );
  719.              ERROR_IF_NOT_ZERO ( retVal );
  720.           }
  721. +#ifdef BZ_RISCOS
  722. +     {
  723. +        int regs[3];
  724. +        rename( outName, inName );
  725. +        regs[2] = 0xffd;
  726. +        os_file( 18, inName, regs );
  727. +     }
  728. +#endif
  729.        }
  730.     } else {
  731.        if ( srcMode == SM_F2F ) {
  732. @@ -3630,11 +3730,13 @@
  733.                  progName, inName );
  734.        return;
  735.     }
  736. +#ifndef BZ_RISCOS
  737.     if ( srcMode != SM_I2O && notABogStandardFile ( inName )) {
  738.        fprintf ( stderr, "%s: Input file %s is not a normal file, skipping.\n",
  739.                  progName, inName );
  740.        return;
  741.     }
  742. +#endif
  743.  
  744.     switch ( srcMode ) {
  745.  
  746. @@ -3833,6 +3935,10 @@
  747.     #if DEBUG
  748.        fprintf ( stderr, "bzip2: *** compiled with debugging ON ***\n" );
  749.     #endif
  750. +
  751. +#if BZ_RISCOS
  752. +   __uname_control = __UNAME_NO_PROCESS; /* Stop Unixlib trying to mangle filenames */
  753. +#endif
  754.  
  755.     /*-- Be really really really paranoid :-) --*/
  756.     if (sizeof(Int32) != 4 || sizeof(UInt32) != 4  ||
  757.